Programmer Plus 2007/Programmer-Plus-2007.iso/Programming/Report Writers/Crystal Repot 9.0 Full CD version/Setup.exe/Tools/Developers/PEDELF32.ZIP/pedelf32/MAIN.dfm/MAIN.txt

Text File | 1998-09-28 | 7.5 KB | 311 lines

object MainForm: TMainForm
  Left = 94
  Top = 196
  AutoScroll = False
  Caption = 'Delphi Print Engine Application'
  ClientHeight = 179
  ClientWidth = 577
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Menu = MainMenu
  OldCreateOrder = True
  Position = poScreenCenter
  ShowHint = True
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 16
  object PnlMain: TPanel
    Left = 0
    Top = 152
    Width = 577
    Height = 25
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 4
      Width = 49
      Height = 16
      Caption = 'Status :'
    end
    object Label2: TLabel
      Left = 416
      Top = 4
      Width = 42
      Height = 16
      Caption = 'Dest : '
    end
    object PnlStatus: TPanel
      Left = 64
      Top = 2
      Width = 337
      Height = 20
      BevelOuter = bvLowered
      Caption = 'None'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object PnlDestination: TPanel
      Left = 464
      Top = 2
      Width = 89
      Height = 20
      BevelOuter = bvLowered
      Caption = 'None'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
  end
  object OpenReportDialog: TOpenDialog
    DefaultExt = 'rpt'
    Filter = 'Crystal Reports|*.rpt'
    InitialDir = 'c:\work'
    Left = 544
    Top = 72
  end
  object MainMenu: TMainMenu
    Left = 544
    Top = 40
    object MnuiFile: TMenuItem
      Caption = 'File'
      object MnuExit: TMenuItem
        Caption = 'E&xit'
        Hint = 'Exit Crpedemo'
        OnClick = MnuExitClick
      end
    end
    object MnuEngine: TMenuItem
      Caption = 'Engine'
      object MnuOpenEngine: TMenuItem
        Caption = '&Open Engine'
        Hint = 'Open Crystal Reports Print Engine'
        OnClick = MnuOpenEngineClick
      end
      object N14: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuCloseEngine: TMenuItem
        Caption = '&Close Engine'
        Enabled = False
        Hint = 'Close Crystal Reports Print Engine'
        OnClick = MnuCloseEngineClick
      end
    end
    object MnuReport: TMenuItem
      Caption = 'Report'
      Enabled = False
      object MnuOpenReport: TMenuItem
        Caption = 'Open Report'
        Enabled = False
        Hint = 'Open a Report'
        OnClick = MnuOpenReportClick
      end
      object N13: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuCloseReport: TMenuItem
        Caption = 'Close Report'
        Enabled = False
        Hint = 'Close Report'
        OnClick = MnuCloseReportClick
      end
    end
    object MnuSqlOptions: TMenuItem
      Caption = 'SQL Options'
      Enabled = False
      object MnuShowSQLQuery: TMenuItem
        Caption = 'Show SQL Query'
        Enabled = False
        OnClick = MnuShowSQLQueryClick
      end
      object N7: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuTestConnectivity: TMenuItem
        Caption = 'Test Table Connectivity'
        OnClick = MnuTestConnectivityClick
      end
      object N8: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuGetInfo: TMenuItem
        Caption = 'Get/Set Log on Info'
        OnClick = MnuGetInfoClick
      end
      object N6: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuLogOn: TMenuItem
        Caption = 'Log On Server'
        OnClick = MnuLogOnClick
      end
      object MnuLogOff: TMenuItem
        Caption = 'Log Off Server'
        Enabled = False
        OnClick = MnuLogOffClick
      end
    end
    object MnuDestination: TMenuItem
      Caption = 'Destination'
      Enabled = False
      object MnuToWindow: TMenuItem
        Caption = 'To Window'
        OnClick = MnuToWindowClick
      end
      object N11: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuToPrinter: TMenuItem
        Caption = 'To Printer'
        OnClick = MnuToPrinterClick
      end
      object N12: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuToFile: TMenuItem
        Caption = 'To File'
        Enabled = False
      end
    end
    object MnuFormatting: TMenuItem
      Caption = 'Formatting'
      Enabled = False
      object MnuGetRepTitle: TMenuItem
        Caption = 'Get Report Title'
        OnClick = MnuGetRepTitleClick
      end
      object N5: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuDiscard: TMenuItem
        Caption = 'Discard Saved Data'
        OnClick = MnuDiscardClick
      end
      object N4: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuGetSectionMin: TMenuItem
        Tag = 1
        Caption = 'Get Section Minimum'
        OnClick = MnuGetSectionMinClick
      end
      object MnuSetSectionMin: TMenuItem
        Tag = 2
        Caption = 'Set Section Minimum'
        OnClick = MnuSetSectionMinClick
      end
    end
    object MnuLocation: TMenuItem
      Caption = 'Location'
      Enabled = False
      object MnuGetLocation: TMenuItem
        Caption = 'Get Table Locations'
        OnClick = MnuGetLocationClick
      end
      object SetTableLocations1: TMenuItem
        Caption = 'Set Table Locations'
        OnClick = SetTableLocations1Click
      end
    end
    object MnuFormulas: TMenuItem
      Caption = 'Formulas'
      Enabled = False
      object MnuSelection: TMenuItem
        Caption = 'Selection Formula'
        OnClick = MnuSelectionClick
      end
      object N9: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuGroup: TMenuItem
        Caption = 'Group Selection'
        OnClick = MnuGroupClick
      end
      object N10: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuAllFormulas: TMenuItem
        Caption = 'Formulas'
        OnClick = MnuAllFormulasClick
      end
    end
    object MnuPrint: TMenuItem
      Caption = 'Print'
      Enabled = False
      object MnuPrintNow: TMenuItem
        Caption = 'Print Now'
        Enabled = False
        OnClick = MnuPrintNowClick
      end
      object MnuClosePreview: TMenuItem
        Caption = 'Close Preview'
        Enabled = False
        OnClick = MnuClosePreviewClick
      end
      object N2: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuGetPrintOptions: TMenuItem
        Caption = 'Get Print Options'
        OnClick = MnuGetPrintOptionsClick
      end
      object N3: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuGetSelectedPrinter: TMenuItem
        Caption = 'Get Selected Printer'
        OnClick = MnuGetSelectedPrinterClick
      end
      object MnuSelectPrinter: TMenuItem
        Caption = 'Select Another Printer'
        OnClick = MnuSelectPrinterClick
      end
    end
    object MnuHelp: TMenuItem
      Caption = 'Help'
      object MnuCallsMade: TMenuItem
        Caption = 'Calls Made'
        OnClick = MnuCallsMadeClick
      end
      object N1: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object MnuAbout: TMenuItem
        Caption = 'About'
        OnClick = MnuAboutClick
      end
    end
  end
  object SetPrinterDialog: TPrintDialog
    Left = 504
    Top = 40
  end
end